﻿Public Class _Default
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub
    Protected Sub Add_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Add.Click
        Dim one As Decimal
        Dim two As Decimal
        Dim result As Decimal
        one = Val(Txt_first_number.Text)
        two = Val(Txt_second_number.Text)
        result = one + two
        Lbl_add.Text = result
    End Sub
End Class